Steps to work with tabstrip 


e° Go to layout of required screen. 

e Select the Tabstrip Control(UI Element) & place it. 

e Double click on tabs and fill its mandatory boxes such 
as name, text , fctcode...... 

e Now, select SubScreen Area UI element and place 
here on every tab. 


Tabstrip Control(UI Element) should be declared in 
program :- 


Syntax [] 


CONTROLS <CTRL NAME> TYPE TABSTRIP. 


Note :- By default,tabl is activated and rest of the tab should be 
activated according to the user interaction in PAI(Process after 
input) of the tabscript ctrl screen explicitely. 


Module name. 


Case sy-ucomm. 
When ‘TABT’ 
Tscl-activetab = ‘TAB1’. “Fcode of tabl. 
When ‘TAB2’ 
Tsc2-activetab = ‘tab2’ “Fcode of tab2. 
Endcase. 
Note :- Make sure that PAI of subscreen should be 
called/executed from PAI of normal screen explicitely i.e. before 
executing PAI of normal screen. 


CALL SUBSCREEN <subscrnarea> 


"for each subscreen area 
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REPORT Z_MULTIPLE_SCREENS2. 


Tables: knal, knkk. 
DATA V_KUNNR TYPE KUNNR. 


CONTROLS TS TYPE TABSTRIP. 
Call screen 9000. 
MODULE USER_COMMAND_9000 INPUT. 
CASE SY-UCOMM. 
WHEN 'BACK'. 
LEAVE TO SCREEN О. 
WHEN 'СВЕАТЕ"'. 


SELECT KUNNR INTO V_KUNNR UP TO 1 ROWS FROM KNA1 WHERE KUNNR = 
KNA1-KUNNR. 


ENDSELECT. 


IF SY-SUBRC = 0. 
MESSAGE 'CUSTOMER ALREADY EXISTS' TYPE 'E'. 
ELSE. 
CALL SCREEN 9001. 
ENDIF. 
ENDCASE. 


ENDMODULE. 

MODULE STATUS_9000 OUTPUT. 
SET PF-STATUS 'ZSTATUS'. 

* SET TITLEBAR 'xxx'. 


ENDMODULE. 


MODULE STATUS_9001 OUTPUT. 
SET PF-STATUS 'ZSTATUS'. 


ENDMODULE. 
MODULE USER_COMMAND_9001 INPUT. 


CASE SY-UCOMM. 
WHEN 'SAVE'. 
INSERT KNA1 FROM KNA1. 
IF SY-SUBRC = 0. 
IF KNKK IS NOT INITIAL. 
INSERT KNKK FROM KNKK. 
ELSE: 
MESSAGE 'RECORD ALREADY EXISTS' TYPE 'E’. 
ENDIF. 
ELSE. 
MESSAGE 'SUCCESSFULLY CREATED ' TYPE '5'. 
ENDIF. 


WHEN 'BACK'. 

LEAVE TO SCREEN 0. 
WHEN 'TSC1'. 
TS-ACTIVETAB = 'Т5С1'. 


WHEN 'TSC2'. 
TS-ACTIVETAB = 'TSC2'. 


ENDCASE. 
ENDMODULE. MODULE SET_DEFAULT_ VALUES 9003 OUTPUT. 
KNKK-KUNNR = KNA1-KUNNR. 
ENDMODULE. 


PROCESS BEFORE OUTPUT. 

CALL SUBSCREEN : 

SA1 INCLUDING SY-CPROG '9002', 
SA2 INCLUDING SY-CPROG '9003'. 
MODULE STATUS_9001. 

PROCESS AFTER INPUT. 

CALL SUBSCREEN : SAI1,SA2 . 


MODULE USER_COMMAND_ 9001. 


